{ Invokable interface Iselfservice }

unit selfserviceIntf;

interface

uses Soap.InvokeRegistry, System.Types, Soap.XSBuiltIns;

type

  { Invokable interfaces must derive from IInvokable }
  Iselfservice = interface(IInvokable)
  ['{525790FB-9F11-40C7-921C-7981AAE8FB20}']

    { Methods of Invokable interface must not use the default }
    { calling convention; stdcall is recommended }
    function GetPatChargeType(request:string) : string;stdcall;
    function GdaGetOutPay(request:string) : string;stdcall;
    function GdaInsertOutPay(request : string) : string;stdcall;
    function GetPatSIState(request : string) : string;stdcall;
  end;

implementation

initialization
  { Invokable interfaces must be registered }
  InvRegistry.RegisterInterface(TypeInfo(Iselfservice));

end.
